home *** CD-ROM | disk | FTP | other *** search
/ The Book of Tells / The Book of Tells.iso / vidgal.dir / 00063_Script_63 < prev    next >
Text File  |  1994-09-22  |  3KB  |  87 lines

  1. on enterFrame
  2.   global classholder, categoryholder, titleholder
  3.   global classmenuholder, categorymenuholder, titlemenuholder
  4.   put classholder
  5.   put categoryholder
  6.   put titleholder
  7.   put classholder into field "Class"
  8.   put categoryholder into field "Category"
  9.   put titleholder into field "Title"
  10.   put classmenuholder into field "Class Menu"
  11.   put categorymenuholder into field "Category Menu"
  12.   put titlemenuholder into field "Title Menu"
  13.   put "0/0" into field "time" 
  14.   set the puppet of sprite 20 to TRUE
  15.   set the puppet of sprite 23 to TRUE
  16.   set the puppet of sprite 24 to TRUE
  17.   set the puppet of sprite 25 to TRUE
  18.   set the puppet of sprite 26 to TRUE
  19.   set the puppet of sprite 27 to TRUE
  20.   set the puppet of sprite 28 to TRUE
  21.   set the puppet of sprite 29 to TRUE
  22.   set the puppet of sprite 30 to TRUE
  23.   set the puppet of sprite 34 to TRUE
  24.   set the puppet of sprite 43 to TRUE
  25.   
  26.   set the puppet of sprite 44 to TRUE
  27.   set the visible of sprite 28 to FALSE
  28.   set the visible of sprite 29 to FALSE
  29.   set the visible of sprite 30 to FALSE
  30.   set the visible of sprite 34 to FALSE
  31.   set the locH of sprite 28 to -200
  32.   set the locH of sprite 29 to -200
  33.   set the locH of sprite 30 to -200
  34.   set the scriptText of cast 29 = the scriptText of cast 23
  35.   set the scriptText of cast 31 = the scriptText of cast 24
  36.   set the scriptText of cast 32 = the scriptText of cast 25
  37.   set the itemDelimiter = "~"
  38.   
  39.   global lineNum, class, oldInfoBox,audioClip,movieClip,movieSpriteNum, mStartTime, mStopTime, infoBox
  40.   
  41.   put word 1 of field "Title" into infoBox
  42.   put word 2 of field "Title" after infoBox
  43.   put the number of lines in field infoBox into numberLines
  44.   
  45.   put line (numberLines - 8) of field infoBox into audioClip
  46.   put line (numberLines - 10) of field infoBox into movieClip
  47.   put line (numberLines - 11) of field infoBox into mStopTime
  48.   put line (numberLines - 12) of field infoBox into mStartTime
  49.   
  50.   
  51.   -- This is the sprite where the movie is
  52.   set movieSpriteNum=7
  53.   puppetSprite movieSpriteNum,TRUE
  54.   unload
  55.   
  56.   put word 1 of field "Title" into infoBox
  57.   put word 2 of field "Title" after infoBox
  58.   
  59.   
  60.   
  61.   put line 5 of field infoBox into field "Tell#"
  62.   put the number of lines in field infoBox into numberLines
  63.   put line (numberLines) of field infoBox into field "$100"
  64.   put line (numberLines - 1) of field infoBox into field "$10"
  65.   put line (numberLines - 2) of field infoBox into field "$1"
  66.   put line (numberLines - 6) of field infoBox into field "Strong"
  67.   put line (numberLines - 5) of field infoBox into field "Average"
  68.   put line (numberLines - 4) of field infoBox into field "Weak"
  69.   put item 4 of field infoBox into field "Motivation"
  70.   delete line 1 of field "Motivation"
  71.   put item 5 of field infoBox into field "Discussion"
  72.   delete line 1 of field "Discussion"
  73.   put item 6 of field infoBox into field "Strategy"
  74.   delete line 1 of field "Strategy"
  75.   put infoBox into oldInfoBox
  76.   put line (numberLines - 8) of field infoBox into audioClip
  77.   
  78.   put line (numberLines - 10) of field infoBox into movieClip
  79.   put line (numberLines - 11) of field infoBox into mStopTime
  80.   put line (numberLines - 12) of field infoBox into mStartTime
  81.   
  82.   go "change"
  83.   
  84.  
  85. updateStage
  86. go to frame 1
  87. end